home *** CD-ROM | disk | FTP | other *** search
- ******** int iPcm8Play() ********
- .globl _iPcm8Play
- .text
- _iPcm8Play
- movem.l 4(sp),d0/d1/d2/a1
- trap #2
- rts
-
- ******** int iPcm8Stat() ********
- .globl _iPcm8Stat
- .text
- _iPcm8Stat
- move.l 4(sp),d0
- add.w #$0080,d0
- trap #2
- rts
-
-
- ******** int iPcm8Stop() ********
- .globl _iPcm8Stop
- .text
- _iPcm8Stop
- move.w #$0101,d0
- trap #2
- move.w #$0100,d0
- trap #2
- rts
-
- ******** int iPcm8Pause() ********
- .globl _iPcm8Pause
- .text
- _iPcm8Pause
- move.w #$0101,d0
- trap #2
- rts
-
- ******** int iPcm8Restart() ********
- .globl _iPcm8Restart
- .text
- _iPcm8Restart
- move.w #$0102,d0
- trap #2
- rts
-
- ******** int iPcm8SetOutHz ********
- .globl _iPcm8SetOutHz
- .text
- _iPcm8SetOutHz
- move.w #$01fd,d0
- move.l 4(sp),d1
- trap #2
- rts
-
- ******** int iSwapHighLowByte
- .globl _iSwapHighLowByte
- .text
- _iSwapHighLowByte:
- move.l 4(sp),a0
- move.l 8(sp),d1
- moveq.l #0,d0
- jbra ?2
- ?5:
- move.w (a0),d2
- rol.w #8,d2
- move.w d2,(a0)+
- addq.l #1,d0
- ?2:
- cmp.l d0,d1
- jbgt ?5
- moveq.l #0,d0
- rts
-
- .end